Aminet 16/Aminet 16 (1996)(GTI - Schatztruhe)[!][Dec 1996].iso/Aminet/util/libs/Identify40.lha/Identify/include/Pascal/identify.lib

Text File | 1996-09-14 | 484b | 21 lines

{$if not def IDENTIFY_LIB} CONST IDENTIFY_LIB=1;

{
** identify_protos.h
**
** (C) 1996 Richard Körber -- All Rights Reserved
}

{$if not def UTILITY_TAGITEM_H;incl "utility/tagitem.h";endif}

VAR IdentifyBase : Ptr;

LIBRARY IdentifyBase :
  -30 : FUNCTION IdExpansion(a0:p_TagItem) : Long;
  -36 : FUNCTION IdHardware(d0:Long;a0:p_TagItem) : Str;
  -42 : FUNCTION IdAlert(d0:Long;a0:p_TagItem) : Long;
  -48 : FUNCTION IdFunction(a0:Str;d0:Long;a1:p_TagItem) : Long;
END;

{$endif}